home *** CD-ROM | disk | FTP | other *** search
/ Aminet 40 / Aminet 40 (2000)(Schatztruhe)[!][Dec 2000].iso / Aminet / misc / emu / ATUtilities.lha / ATUtilities / janus_lib.asm < prev    next >
Assembly Source File  |  2000-09-26  |  7KB  |  381 lines
  1.    XREF _JanusBase
  2.    XDEF _LVOSetJanusHandler
  3. _LVOSetJanusHandler: EQU -30
  4.    XDEF _SetJanusHandler
  5. _SetJanusHandler:
  6.    MOVE.L A6,-(SP)
  7.    MOVE.L 8(SP),D0
  8.    MOVE.L 12(SP),A1
  9.    MOVE.L _JanusBase,A6
  10.    JSR -30(A6)
  11.    MOVE.L (SP)+,A6
  12.    RTS
  13.    XDEF _LVOSetJanusRequest
  14. _LVOSetJanusRequest: EQU -36
  15.    XDEF _SetJanusRequest
  16. _SetJanusRequest:
  17.    MOVE.L A6,-(SP)
  18.    MOVE.L 8(SP),D0
  19.    MOVE.L 12(SP),D1
  20.    MOVE.L _JanusBase,A6
  21.    JSR -36(A6)
  22.    MOVE.L (SP)+,A6
  23.    RTS
  24.    XDEF _LVOSetJanusEnable
  25. _LVOSetJanusEnable: EQU -42
  26.    XDEF _SetJanusEnable
  27. _SetJanusEnable:
  28.    MOVE.L A6,-(SP)
  29.    MOVE.L 8(SP),D0
  30.    MOVE.L 12(SP),D1
  31.    MOVE.L _JanusBase,A6
  32.    JSR -42(A6)
  33.    MOVE.L (SP)+,A6
  34.    RTS
  35.    XDEF _LVOSendJanusInt
  36. _LVOSendJanusInt: EQU -48
  37.    XDEF _SendJanusInt
  38. _SendJanusInt:
  39.    MOVE.L A6,-(SP)
  40.    MOVE.L 8(SP),D0
  41.    MOVE.L _JanusBase,A6
  42.    JSR -48(A6)
  43.    MOVE.L (SP)+,A6
  44.    RTS
  45.    XDEF _LVOCheckJanusInt
  46. _LVOCheckJanusInt: EQU -54
  47.    XDEF _CheckJanusInt
  48. _CheckJanusInt:
  49.    MOVE.L A6,-(SP)
  50.    MOVE.L 8(SP),D0
  51.    MOVE.L _JanusBase,A6
  52.    JSR -54(A6)
  53.    MOVE.L (SP)+,A6
  54.    RTS
  55.    XDEF _LVOAllocJanusMem
  56. _LVOAllocJanusMem: EQU -60
  57.    XDEF _AllocJanusMem
  58. _AllocJanusMem:
  59.    MOVE.L A6,-(SP)
  60.    MOVE.L 8(SP),D0
  61.    MOVE.L 12(SP),D1
  62.    MOVE.L _JanusBase,A6
  63.    JSR -60(A6)
  64.    MOVE.L (SP)+,A6
  65.    RTS
  66.    XDEF _LVOFreeJanusMem
  67. _LVOFreeJanusMem: EQU -66
  68.    XDEF _FreeJanusMem
  69. _FreeJanusMem:
  70.    MOVE.L A6,-(SP)
  71.    MOVE.L 8(SP),A1
  72.    MOVE.L 12(SP),D0
  73.    MOVE.L _JanusBase,A6
  74.    JSR -66(A6)
  75.    MOVE.L (SP)+,A6
  76.    RTS
  77.    XDEF _LVOJanusMemBase
  78. _LVOJanusMemBase: EQU -72
  79.    XDEF _JanusMemBase
  80. _JanusMemBase:
  81.    MOVE.L A6,-(SP)
  82.    MOVE.L 8(SP),D0
  83.    MOVE.L _JanusBase,A6
  84.    JSR -72(A6)
  85.    MOVE.L (SP)+,A6
  86.    RTS
  87.    XDEF _LVOJanusMemType
  88. _LVOJanusMemType: EQU -78
  89.    XDEF _JanusMemType
  90. _JanusMemType:
  91.    MOVE.L A6,-(SP)
  92.    MOVE.L 8(SP),D0
  93.    MOVE.L _JanusBase,A6
  94.    JSR -78(A6)
  95.    MOVE.L (SP)+,A6
  96.    RTS
  97.    XDEF _LVOJanusMemToOffset
  98. _LVOJanusMemToOffset: EQU -84
  99.    XDEF _JanusMemToOffset
  100. _JanusMemToOffset:
  101.    MOVE.L A6,-(SP)
  102.    MOVE.L 8(SP),D0
  103.    MOVE.L _JanusBase,A6
  104.    JSR -84(A6)
  105.    MOVE.L (SP)+,A6
  106.    RTS
  107.    XDEF _LVOGetParamOffset
  108. _LVOGetParamOffset: EQU -90
  109.    XDEF _GetParamOffset
  110. _GetParamOffset:
  111.    MOVE.L A6,-(SP)
  112.    MOVE.L 8(SP),D0
  113.    MOVE.L _JanusBase,A6
  114.    JSR -90(A6)
  115.    MOVE.L (SP)+,A6
  116.    RTS
  117.    XDEF _LVOSetParamOffset
  118. _LVOSetParamOffset: EQU -96
  119.    XDEF _SetParamOffset
  120. _SetParamOffset:
  121.    MOVE.L A6,-(SP)
  122.    MOVE.L 8(SP),D0
  123.    MOVE.L 12(SP),D1
  124.    MOVE.L _JanusBase,A6
  125.    JSR -96(A6)
  126.    MOVE.L (SP)+,A6
  127.    RTS
  128.    XDEF _LVOGetJanusStart
  129. _LVOGetJanusStart: EQU -102
  130.    XDEF _GetJanusStart
  131. _GetJanusStart:
  132.    MOVE.L A6,-(SP)
  133.    MOVE.L _JanusBase,A6
  134.    JSR -102(A6)
  135.    MOVE.L (SP)+,A6
  136.    RTS
  137.    XDEF _LVOSetupJanusSig
  138. _LVOSetupJanusSig: EQU -108
  139.    XDEF _SetupJanusSig
  140. _SetupJanusSig:
  141.    MOVE.L A6,-(SP)
  142.    MOVE.L 8(SP),D0
  143.    MOVE.L 12(SP),D1
  144.    MOVE.L 16(SP),D2
  145.    MOVE.L 20(SP),D3
  146.    MOVE.L _JanusBase,A6
  147.    JSR -108(A6)
  148.    MOVE.L (SP)+,A6
  149.    RTS
  150.    XDEF _LVOCleanupJanusSig
  151. _LVOCleanupJanusSig: EQU -114
  152.    XDEF _CleanupJanusSig
  153. _CleanupJanusSig:
  154.    MOVE.L A6,-(SP)
  155.    MOVE.L 8(SP),A0
  156.    MOVE.L _JanusBase,A6
  157.    JSR -114(A6)
  158.    MOVE.L (SP)+,A6
  159.    RTS
  160.    XDEF _LVOJanusLock
  161. _LVOJanusLock: EQU -120
  162.    XDEF _JanusLock
  163. _JanusLock:
  164.    MOVE.L A6,-(SP)
  165.    MOVE.L 8(SP),A0
  166.    MOVE.L _JanusBase,A6
  167.    JSR -120(A6)
  168.    MOVE.L (SP)+,A6
  169.    RTS
  170.    XDEF _LVOJanusUnlock
  171. _LVOJanusUnlock: EQU -126
  172.    XDEF _JanusUnlock
  173. _JanusUnlock:
  174.    MOVE.L A6,-(SP)
  175.    MOVE.L 8(SP),A0
  176.    MOVE.L _JanusBase,A6
  177.    JSR -126(A6)
  178.    MOVE.L (SP)+,A6
  179.    RTS
  180.    XDEF _LVOJBCopy
  181. _LVOJBCopy: EQU -132
  182.    XDEF _JBCopy
  183. _JBCopy:
  184.    MOVE.L A6,-(SP)
  185.    MOVE.L 8(SP),A0
  186.    MOVE.L 12(SP),A1
  187.    MOVE.L 16(SP),D0
  188.    MOVE.L _JanusBase,A6
  189.    JSR -132(A6)
  190.    MOVE.L (SP)+,A6
  191.    RTS
  192.    XDEF _LVOAddService
  193. _LVOAddService: EQU -138
  194.    XDEF _AddService
  195. _AddService:
  196.    MOVE.L A6,-(SP)
  197.    MOVE.L 8(SP),A0
  198.    MOVE.L 12(SP),D0
  199.    MOVE.L 16(SP),D1
  200.    MOVE.L 20(SP),D2
  201.    MOVE.L 24(SP),D3
  202.    MOVE.L 28(SP),D4
  203.    MOVE.L 32(SP),D5
  204.    MOVE.L _JanusBase,A6
  205.    JSR -138(A6)
  206.    MOVE.L (SP)+,A6
  207.    RTS
  208.    XDEF _LVOGetService
  209. _LVOGetService: EQU -144
  210.    XDEF _GetService
  211. _GetService:
  212.    MOVE.L A6,-(SP)
  213.    MOVE.L 8(SP),A0
  214.    MOVE.L 12(SP),D0
  215.    MOVE.L 16(SP),D1
  216.    MOVE.L 20(SP),D2
  217.    MOVE.L 24(SP),D3
  218.    MOVE.L _JanusBase,A6
  219.    JSR -144(A6)
  220.    MOVE.L (SP)+,A6
  221.    RTS
  222.    XDEF _LVOCallService
  223. _LVOCallService: EQU -150
  224.    XDEF _CallService
  225. _CallService:
  226.    MOVE.L A6,-(SP)
  227.    MOVE.L 8(SP),A0
  228.    MOVE.L _JanusBase,A6
  229.    JSR -150(A6)
  230.    MOVE.L (SP)+,A6
  231.    RTS
  232.    XDEF _LVOReleaseService
  233. _LVOReleaseService: EQU -156
  234.    XDEF _ReleaseService
  235. _ReleaseService:
  236.    MOVE.L A6,-(SP)
  237.    MOVE.L 8(SP),A0
  238.    MOVE.L _JanusBase,A6
  239.    JSR -156(A6)
  240.    MOVE.L (SP)+,A6
  241.    RTS
  242.    XDEF _LVODeleteService
  243. _LVODeleteService: EQU -162
  244.    XDEF _DeleteService
  245. _DeleteService:
  246.    MOVE.L A6,-(SP)
  247.    MOVE.L 8(SP),A0
  248.    MOVE.L _JanusBase,A6
  249.    JSR -162(A6)
  250.    MOVE.L (SP)+,A6
  251.    RTS
  252.    XDEF _LVOJanusOffsetToMem
  253. _LVOJanusOffsetToMem: EQU -168
  254.    XDEF _JanusOffsetToMem
  255. _JanusOffsetToMem:
  256.    MOVE.L A6,-(SP)
  257.    MOVE.L 8(SP),D0
  258.    MOVE.L 12(SP),D1
  259.    MOVE.L _JanusBase,A6
  260.    JSR -168(A6)
  261.    MOVE.L (SP)+,A6
  262.    RTS
  263.    XDEF _LVOTranslateJanusPtr
  264. _LVOTranslateJanusPtr: EQU -174
  265.    XDEF _TranslateJanusPtr
  266. _TranslateJanusPtr:
  267.    MOVE.L A6,-(SP)
  268.    MOVE.L 8(SP),A0
  269.    MOVE.L 12(SP),D0
  270.    MOVE.L _JanusBase,A6
  271.    JSR -174(A6)
  272.    MOVE.L (SP)+,A6
  273.    RTS
  274.    XDEF _LVOMakeBytePtr
  275. _LVOMakeBytePtr: EQU -180
  276.    XDEF _MakeBytePtr
  277. _MakeBytePtr:
  278.    MOVE.L A6,-(SP)
  279.    MOVE.L 8(SP),A0
  280.    MOVE.L _JanusBase,A6
  281.    JSR -180(A6)
  282.    MOVE.L (SP)+,A6
  283.    RTS
  284.    XDEF _LVOMakeWordPtr
  285. _LVOMakeWordPtr: EQU -186
  286.    XDEF _MakeWordPtr
  287. _MakeWordPtr:
  288.    MOVE.L A6,-(SP)
  289.    MOVE.L 8(SP),A0
  290.    MOVE.L _JanusBase,A6
  291.    JSR -186(A6)
  292.    MOVE.L (SP)+,A6
  293.    RTS
  294.    XDEF _LVOAllocJRemember
  295. _LVOAllocJRemember: EQU -192
  296.    XDEF _AllocJRemember
  297. _AllocJRemember:
  298.    MOVE.L A6,-(SP)
  299.    MOVE.L 8(SP),A0
  300.    MOVE.L 12(SP),D0
  301.    MOVE.L 16(SP),D1
  302.    MOVE.L _JanusBase,A6
  303.    JSR -192(A6)
  304.    MOVE.L (SP)+,A6
  305.    RTS
  306.    XDEF _LVOFreeJRemember
  307. _LVOFreeJRemember: EQU -198
  308.    XDEF _FreeJRemember
  309. _FreeJRemember:
  310.    MOVE.L A6,-(SP)
  311.    MOVE.L 8(SP),A0
  312.    MOVE.L 12(SP),D0
  313.    MOVE.L _JanusBase,A6
  314.    JSR -198(A6)
  315.    MOVE.L (SP)+,A6
  316.    RTS
  317.    XDEF _LVOAttachJRemember
  318. _LVOAttachJRemember: EQU -204
  319.    XDEF _AttachJRemember
  320. _AttachJRemember:
  321.    MOVE.L A6,-(SP)
  322.    MOVE.L 8(SP),A0
  323.    MOVE.L 12(SP),A1
  324.    MOVE.L _JanusBase,A6
  325.    JSR -204(A6)
  326.    MOVE.L (SP)+,A6
  327.    RTS
  328.    XDEF _LVOAllocServiceMem
  329. _LVOAllocServiceMem: EQU -210
  330.    XDEF _AllocServiceMem
  331. _AllocServiceMem:
  332.    MOVE.L A6,-(SP)
  333.    MOVE.L 8(SP),A0
  334.    MOVE.L 12(SP),D0
  335.    MOVE.L 16(SP),D1
  336.    MOVE.L _JanusBase,A6
  337.    JSR -210(A6)
  338.    MOVE.L (SP)+,A6
  339.    RTS
  340.    XDEF _LVOFreeServiceMem
  341. _LVOFreeServiceMem: EQU -216
  342.    XDEF _FreeServiceMem
  343. _FreeServiceMem:
  344.    MOVE.L A6,-(SP)
  345.    MOVE.L 8(SP),A0
  346.    MOVE.L 12(SP),A1
  347.    MOVE.L _JanusBase,A6
  348.    JSR -216(A6)
  349.    MOVE.L (SP)+,A6
  350.    RTS
  351.    XDEF _LVOJanusLockAttempt
  352. _LVOJanusLockAttempt: EQU -222
  353.    XDEF _JanusLockAttempt
  354. _JanusLockAttempt:
  355.    MOVE.L A6,-(SP)
  356.    MOVE.L 8(SP),A0
  357.    MOVE.L _JanusBase,A6
  358.    JSR -222(A6)
  359.    MOVE.L (SP)+,A6
  360.    RTS
  361.    XDEF _LVOLockService
  362. _LVOLockService: EQU -228
  363.    XDEF _LockService
  364. _LockService:
  365.    MOVE.L A6,-(SP)
  366.    MOVE.L 8(SP),A0
  367.    MOVE.L _JanusBase,A6
  368.    JSR -228(A6)
  369.    MOVE.L (SP)+,A6
  370.    RTS
  371.    XDEF _LVOUnLockService
  372. _LVOUnLockService: EQU -234
  373.    XDEF _UnLockService
  374. _UnLockService:
  375.    MOVE.L A6,-(SP)
  376.    MOVE.L 8(SP),A0
  377.    MOVE.L _JanusBase,A6
  378.    JSR -234(A6)
  379.    MOVE.L (SP)+,A6
  380.    RTS
  381.